perm filename STRING.SEX[AL,HE] blob sn#528529 filedate 1980-08-10 generic text, type T, neo UTF8
($PR
  ($BL
    ( $STVAR S1 S2 S3 )
    ( $AS S1
      "ABCDEFGHIJ"
    )
    ( $AS S2
      S1
    )
    ( $PRINT 
      "QRE"
      S2
      S1
    )
  )
)